(defmethod fun1 (x)
  (print x)
  (fun2 x)
  (print x))

(defmethod fun2 (x)
  (setf x 10)
  (print x))

(fun1 5)
